home *** CD-ROM | disk | FTP | other *** search
/ Kyoko 8203 / Kyoko 8203.iso / pc / clip.dxr / 00018_èâä²âª.ls < prev    next >
Encoding:
Text File  |  2003-03-10  |  271 b   |  13 lines
  1. on prepareFrame
  2.   global cdvoume, movieon
  3.   movieon = 0
  4.   set the volume of sound 1 to cdvoume * 19
  5.   repeat with i = 15 to 27
  6.     sprite(i).visible = 1
  7.   end repeat
  8.   repeat with i = 15 + cdvoume to 27
  9.     sprite(i).visible = 0
  10.   end repeat
  11.   sprite(37).visible = 0
  12. end
  13.